(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 8.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       157,          7]
NotebookDataLength[     41252,        879]
NotebookOptionsPosition[     39280,        816]
NotebookOutlinePosition[     39663,        832]
CellTagsIndexPosition[     39620,        829]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["OrificeCheckValveG", "Section",
 PageWidth->WindowWidth,
 CellChangeTimes->{{3.5792771018555584`*^9, 3.579277104368702*^9}, {
   3.6352487692306995`*^9, 3.6352487812339*^9}, {3.6445677080546837`*^9, 
   3.6445677153231*^9}, 3.644567852766961*^9}],

Cell[BoxData[
 RowBox[{"<<", "C:\\\\Hopsan\\Compgen\\CompgenNG.mx"}]], "Input",
 CellChangeTimes->{{3.5772037650720577`*^9, 3.5772037650780582`*^9}, {
  3.611474457184202*^9, 3.611474523938877*^9}, {3.6114745588913717`*^9, 
  3.61147456057154*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"path", "=", 
   RowBox[{"ToFileName", "[", 
    RowBox[{"{", 
     RowBox[{
     "\"\<C:\>\"", ",", "\"\<HopsanTrunk\>\"", ",", 
      "\"\<ComponentLibraries\>\"", ",", "\"\<defaultLibrary\>\"", ",", 
      "\"\<Hydraulic\>\"", ",", "\"\<Special\>\""}], "}"}], "]"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.5757727777685804`*^9, 3.575772792541806*^9}, {
   3.5757728423954945`*^9, 3.5757728498367076`*^9}, {3.57577333888545*^9, 
   3.5757733706315055`*^9}, 3.5757734316206255`*^9, 3.6031909973287797`*^9, 
   3.6057717887213297`*^9, {3.605771829393656*^9, 3.605771830929744*^9}, 
   3.6058530990363216`*^9, {3.621138851005574*^9, 3.621138863716845*^9}, {
   3.626686112671085*^9, 3.6266861209310846`*^9}, {3.632581474573143*^9, 
   3.632581481776555*^9}, {3.6363469199835668`*^9, 3.636346925752144*^9}, {
   3.6366417097867303`*^9, 3.636641716455112*^9}}],

Cell[CellGroupData[{

Cell["Component description", "Subsection",
 PageWidth->WindowWidth],

Cell["\<\
This subroutine simulates the flow trough a 3-3 directional valve.\
\>", "Text",
 PageWidth->WindowWidth]
}, Open  ]],

Cell[CellGroupData[{

Cell["System model", "Subsection",
 CellChangeTimes->{{3.504161099890625*^9, 3.504161102453125*^9}}],

Cell[BoxData[{
 RowBox[{
  RowBox[{"domain", "=", "\"\<Hydraulic\>\""}], ";"}], "\n", 
 RowBox[{
  RowBox[{"displayName", "=", "\"\<OrificeCheckValveG\>\""}], ";"}], "\n", 
 RowBox[{
  RowBox[{
  "brief", "=", "\"\<A load sensing hydraulic directional valve\>\""}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"componentType", "=", "\"\<ComponentQ\>\""}], ";"}], "\n", 
 RowBox[{
  RowBox[{"author", "=", "\"\<Petter Krus <petter.krus@liu.se>\>\""}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{
  "affiliation", " ", "=", " ", 
   "\"\<Division of Fluid and Mechatronic Systems, Link\[ODoubleDot]ping \
University\>\""}], ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"SetFilenames", "[", 
   RowBox[{"path", ",", "domain", ",", "displayName"}], "]"}], 
  ";"}], "\[IndentingNewLine]", 
 RowBox[{
  RowBox[{"ResetComponentVariables", "[", "]"}], ";"}]}], "Input",
 CellChangeTimes->{{3.503905077842648*^9, 3.503905079842648*^9}, {
   3.5039103076641607`*^9, 3.5039103985397425`*^9}, {3.5039164662834997`*^9, 
   3.5039164750178747`*^9}, {3.5039165143772497`*^9, 
   3.5039165189397497`*^9}, {3.5041051675625*^9, 3.504105226359375*^9}, {
   3.507570546125*^9, 3.507570569546875*^9}, {3.507570601046875*^9, 
   3.50757067696875*^9}, 3.507796401609375*^9, {3.507887022343302*^9, 
   3.507887057967846*^9}, {3.5078871702320337`*^9, 3.507887175028847*^9}, {
   3.5158208831437864`*^9, 3.51582092036206*^9}, {3.5158209798300486`*^9, 
   3.51582099300181*^9}, {3.522605661421875*^9, 3.522605661625*^9}, {
   3.565433404364499*^9, 3.5654334224825306`*^9}, {3.5695965311236906`*^9, 
   3.569596540324217*^9}, 3.5757721159132*^9, {3.5792775100129037`*^9, 
   3.5792775101679125`*^9}, {3.57927754456888*^9, 3.57927754561794*^9}, 
   3.6352487855443306`*^9, {3.6445668034309425`*^9, 3.64456680758718*^9}, 
   3.6445678453195353`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"nodeConnections", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"HydraulicQnode", "[", 
      RowBox[{"p", ",", 
       RowBox[{"1.", "*", 
        RowBox[{"10", "^", "5"}]}], ",", "\"\<Piston port\>\""}], "]"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"HydraulicQnode", "[", 
      RowBox[{"c", ",", 
       RowBox[{"1.", "*", 
        RowBox[{"10", "^", "5"}]}], ",", "\"\<Damp chamber port\>\""}], 
      "]"}]}], "\[IndentingNewLine]", "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.503919051294972*^9, 3.503919119154347*^9}, {
   3.503923736440875*^9, 3.503923751003375*^9}, {3.5039293570625*^9, 
   3.503929406765625*^9}, 3.50394250446875*^9, {3.50399668911909*^9, 
   3.5039966973713074`*^9}, {3.507548807751546*^9, 3.5075488260955305`*^9}, {
   3.515612779640625*^9, 3.515612784234375*^9}, {3.575649090069656*^9, 
   3.575649091319728*^9}, 3.579277137972624*^9, 3.5792834273963585`*^9, {
   3.6352487521779947`*^9, 3.6352487532751045`*^9}, {3.6352488678095565`*^9, 
   3.635248911469922*^9}, 3.6366410895942574`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"inputVariables", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "Ao", ",", "0.0003", ",", "double", ",", "\"\<m2\>\"", ",", 
       "\"\<Otifice area\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "dh", ",", "0.3", ",", "double", ",", "\"\<m\>\"", ",", 
       "\"\<Orifice hydraulic diameter\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "lo", ",", ".001", ",", "double", ",", "\"\<m\>\"", ",", 
       "\"\<Length\>\""}], "}"}]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.571994842405704*^9, 3.571994911670148*^9}, 
   3.6366363267108364`*^9, {3.636640992569708*^9, 3.636640993633769*^9}, {
   3.6374053706731043`*^9, 3.6374054191159477`*^9}, {3.637405464908527*^9, 
   3.6374054802850647`*^9}, {3.637405774993532*^9, 3.63740577537057*^9}, {
   3.6374058247935114`*^9, 3.637405826737706*^9}, {3.64234798274806*^9, 
   3.6423479903084927`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"inputParameters", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "rho", ",", "860.", ",", "double", ",", "\"\<kg/m3\>\"", ",", 
       "\"\<oil density\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "visc", ",", "0.12", ",", "double", ",", "\"\<m\>\"", ",", 
       "\"\<Dynamic viscosity \>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Cdt", ",", "0.67", ",", "double", ",", "\"\<\>\"", ",", 
       "\"\<Turbulent flow coefficient.\>\""}], "}"}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "del", ",", "0.02", ",", "double", ",", "\"\<\>\"", ",", 
       "\"\<Flow coefficient.\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Ab", ",", ".0001", ",", "double", ",", "\"\<m2\>\"", ",", 
       "\"\<back valve area\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "dhb", ",", ".0001", ",", "double", ",", "\"\<m2\>\"", ",", 
       "\"\<back valve hydraulic diameter\>\""}], "}"}]}], 
    "\[IndentingNewLine]", "}"}]}], ";"}]], "Input",
 PageWidth->WindowWidth,
 CellChangeTimes->{{3.503916073562605*^9, 3.50391608476573*^9}, {
   3.5039161716261826`*^9, 3.503916172813698*^9}, 3.503919167716847*^9, {
   3.505588895375*^9, 3.5055889695*^9}, {3.505589016640625*^9, 
   3.505589034984375*^9}, {3.505589276125*^9, 3.505589277078125*^9}, {
   3.505590362109375*^9, 3.50559036675*^9}, {3.505590803484375*^9, 
   3.50559082509375*^9}, {3.5075449148100324`*^9, 3.507544933372048*^9}, {
   3.5075449813674784`*^9, 3.507545001403344*^9}, {3.507562171421875*^9, 
   3.50756217203125*^9}, {3.5158237803828354`*^9, 3.5158238002578354`*^9}, 
   3.57927714786719*^9, 3.579277240431484*^9, 3.5792851123017297`*^9, {
   3.636636236452674*^9, 3.636636290554768*^9}, {3.636638689456978*^9, 
   3.636638741218938*^9}, {3.6366419821093063`*^9, 3.636642010788947*^9}, {
   3.6366442443226976`*^9, 3.6366442490229664`*^9}, {3.636644814424306*^9, 
   3.6366448772729006`*^9}, 3.636645943365877*^9, {3.6366463996529756`*^9, 
   3.636646420140147*^9}, 3.637405362321269*^9, {3.637405503759412*^9, 
   3.637405571309166*^9}, {3.637405642326267*^9, 3.63740567076311*^9}, 
   3.637405919876019*^9, 3.6374059689959307`*^9, {3.6374656706529922`*^9, 
   3.637465672100137*^9}, {3.640685313180561*^9, 3.640685313716592*^9}, 
   3.6423482880995255`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"outputVariables", "=", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{
      "Ro", ",", "0.", ",", "double", ",", "\"\<\>\"", ",", 
       "\"\<Rynolds number\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "DRL", ",", "0.", ",", "double", ",", "\"\<\>\"", ",", 
       "\"\<dh Ro/lo\>\""}], "}"}], ",", "\[IndentingNewLine]", 
     RowBox[{"{", 
      RowBox[{
      "Cd", ",", ".611", ",", "double", ",", "\"\<\>\"", ",", 
       "\"\<Discharge coeff\>\""}], "}"}]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.571994842405704*^9, 3.571994911670148*^9}, 
   3.636882611277775*^9, {3.636883460464685*^9, 3.6368834775373917`*^9}, {
   3.636954888739952*^9, 3.6369549872398005`*^9}, 3.63695521385546*^9, {
   3.6373835770818925`*^9, 3.6373835800431886`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"pdif", ":=", 
   RowBox[{"pc", "-", "pp"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.6369659932433147`*^9, 3.636965995553546*^9}}],

Cell["The hydraulic diameter is :", "Text",
 CellChangeTimes->{{3.636965585342529*^9, 3.636965594330427*^9}}],

Cell["dh := 4 Ao/So;", "Text",
 CellChangeTimes->{3.642348000737089*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"eps", "=", ".1"}], ";"}]], "Input",
 CellChangeTimes->{{3.6368825760612535`*^9, 3.636882611280775*^9}, {
  3.636959357310774*^9, 3.636959357838826*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"sf", "=", "0"}], ";"}]], "Input",
 CellChangeTimes->{{3.636966002337224*^9, 3.6369660088668766`*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Ae", "=", 
  RowBox[{"ifPositive", "[", 
   RowBox[{
    RowBox[{"pc", "-", "pp"}], ",", "\[IndentingNewLine]", "Ao", ",", 
    "\[IndentingNewLine]", "Ab"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.6366463523432693`*^9, 3.6366463563775005`*^9}, {
   3.6366949536046023`*^9, 3.636694955341776*^9}, {3.637465611736101*^9, 
   3.6374656124241705`*^9}, {3.637465644978425*^9, 3.637465650033931*^9}, {
   3.6374696061062217`*^9, 3.6374696201585026`*^9}, 3.637472939294402*^9, {
   3.637473509844956*^9, 3.637473520007058*^9}}],

Cell[BoxData[
 RowBox[{"ifPositive", "[", 
  RowBox[{
   RowBox[{"pc", "-", "pp"}], ",", "Ao", ",", "Ab"}], "]"}]], "Output",
 CellChangeTimes->{
  3.6374657164385705`*^9, 3.637469628749675*^9, 3.6374729434344854`*^9, 
   3.639764053219595*^9, 3.6398034342569146`*^9, 3.6445668814084024`*^9, 
   3.6445672947750463`*^9, 3.644567329594037*^9, 3.64456785904332*^9, 
   3.644571810251316*^9, 3.647750619189706*^9, {3.6477506551867647`*^9, 
   3.6477506687525406`*^9}, 3.6477507157182274`*^9, 3.647750754019418*^9}]
}, Open  ]],

Cell["dh := 4 Ae/So;", "Text",
 CellChangeTimes->{
  3.6374657005079775`*^9, {3.640685244261619*^9, 3.6406852451636705`*^9}, 
   3.6423480098736115`*^9}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"10", " ", 
  FractionBox["Pi", "180."]}]], "Input",
 CellChangeTimes->{{3.6376369240936003`*^9, 3.6376369286250534`*^9}}],

Cell[BoxData["0.17453292519943295`"], "Output",
 CellChangeTimes->{
  3.6376369294701385`*^9, 3.6397640532585974`*^9, 3.6398034342949142`*^9, 
   3.6445668814424047`*^9, 3.6445672948020477`*^9, 3.644567329625039*^9, 
   3.6445678590693216`*^9, 3.644571810278318*^9, 3.6477506192147074`*^9, {
   3.647750655225767*^9, 3.6477506687755423`*^9}, 3.647750715744229*^9, 
   3.64775075405442*^9}]
}, Open  ]],

Cell[BoxData[
 RowBox[{
  RowBox[{"na", "=", "1"}], ";", 
  RowBox[{"nb", "=", "2"}], ";"}]], "Input",
 CellChangeTimes->{{3.6446347562116194`*^9, 3.6446347735026083`*^9}, {
   3.644634995609312*^9, 3.6446349969053864`*^9}, {3.64463511131293*^9, 
   3.6446351143011007`*^9}, 3.6446352065633783`*^9, 3.64463538615565*^9, 
   3.6446354788019495`*^9, {3.6446356127866125`*^9, 3.6446356134796524`*^9}, 
   3.6446357177416153`*^9, {3.6446419159446282`*^9, 3.6446419217282066`*^9}, 
   3.64464347599886*^9, 3.647744896673397*^9, 3.647745386334404*^9, 
   3.647745594438307*^9, 3.647746521369324*^9, 3.6477468121419554`*^9, 
   3.647746938500183*^9, {3.6477469875489883`*^9, 3.647746989241085*^9}, 
   3.647747215608032*^9, 3.647748205603657*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"systemEquationsDA", " ", "=", " ", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{"qp", " ", "==", " ", 
     FractionBox[
      RowBox[{"Ae", " ", "pdif"}], 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            FractionBox[
             SuperscriptBox["visc", "2"], 
             RowBox[{"4", "  ", 
              SuperscriptBox["del", "4"], " ", 
              SuperscriptBox["dh", "2"]}]], "+", 
            FractionBox[
             RowBox[{
              SuperscriptBox["lo", "2"], " ", 
              SuperscriptBox[
               RowBox[{"(", 
                RowBox[{"48", "-", 
                 RowBox[{"16", " ", "sf"}]}], ")"}], "2"], " ", 
              SuperscriptBox["visc", "2"]}], 
             RowBox[{" ", 
              SuperscriptBox["dh", "4"]}]]}], ")"}], "2"], "+", 
         FractionBox[
          RowBox[{
           SuperscriptBox["rho", "2"], 
           SuperscriptBox["pdif", "2"]}], 
          RowBox[{"4", 
           SuperscriptBox["Cdt", "4"]}]]}], ")"}], 
       RowBox[{"1", "/", "4"}]]]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.50754870493773*^9, 3.507548721672319*^9}, {
   3.5719027806054535`*^9, 3.5719028099647055`*^9}, {3.5792771950828905`*^9, 
   3.5792771972320137`*^9}, {3.579283492398076*^9, 3.579283496610317*^9}, {
   3.6352492843192034`*^9, 3.63524928439021*^9}, {3.6352496954483123`*^9, 
   3.6352497025010176`*^9}, 3.636222765509492*^9, 3.636638326205201*^9, {
   3.63663835679295*^9, 3.6366384268709583`*^9}, {3.636638597377711*^9, 
   3.636638635460889*^9}, 3.636641076816527*^9, {3.636641808316366*^9, 
   3.6366418253723416`*^9}, {3.6366419288522606`*^9, 3.636641930436351*^9}, {
   3.6366447909609632`*^9, 3.6366448028156414`*^9}, {3.6366448840232863`*^9, 
   3.6366449058605356`*^9}, {3.636644998537836*^9, 3.6366450790124393`*^9}, {
   3.636645115853546*^9, 3.6366451561588516`*^9}, 3.6366453323089266`*^9, {
   3.6366459796519527`*^9, 3.6366459997131004`*^9}, {3.6366461574261208`*^9, 
   3.636646189173937*^9}, {3.6366877199187403`*^9, 3.6366877227273016`*^9}, 
   3.6366881033996363`*^9, {3.6369659535883493`*^9, 3.636965959205911*^9}, 
   3.6374059548545165`*^9, {3.637465617884716*^9, 3.637465635677495*^9}, {
   3.6376356536875725`*^9, 3.6376356607777095`*^9}, {3.639763924704244*^9, 
   3.6397639871438155`*^9}, {3.6397640386137595`*^9, 3.6397640478052855`*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"systemEquationsDA", " ", ":=", " ", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{"qp", " ", "==", " ", 
     FractionBox[
      RowBox[{"Ae", " ", "pdif"}], 
      SuperscriptBox[
       RowBox[{"(", 
        RowBox[{
         SuperscriptBox[
          RowBox[{"(", 
           RowBox[{
            SuperscriptBox[
             RowBox[{"(", 
              FractionBox["visc", 
               RowBox[{"2", "  ", 
                SuperscriptBox["del", "2"], " ", "dh"}]], ")"}], "na"], "+", 
            SuperscriptBox[
             RowBox[{"(", 
              FractionBox[
               RowBox[{"lo", " ", 
                RowBox[{"(", 
                 RowBox[{"48", "-", 
                  RowBox[{"16", " ", "sf"}]}], ")"}], " ", "visc"}], 
               RowBox[{" ", 
                SuperscriptBox["dh", "2"]}]], ")"}], "na"]}], ")"}], 
          RowBox[{"nb", "/", "na"}]], "+", 
         SuperscriptBox[
          RowBox[{"(", 
           FractionBox[
            RowBox[{"rho", " ", 
             RowBox[{"Abs", "[", "pdif", "]"}]}], 
            RowBox[{"2", " ", 
             SuperscriptBox["Cdt", "2"]}]], ")"}], 
          FractionBox["nb", "2"]]}], ")"}], 
       RowBox[{"1", "/", "nb"}]]]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.50754870493773*^9, 3.507548721672319*^9}, {
   3.5719027806054535`*^9, 3.5719028099647055`*^9}, {3.5792771950828905`*^9, 
   3.5792771972320137`*^9}, {3.579283492398076*^9, 3.579283496610317*^9}, {
   3.6357410502699623`*^9, 3.6357410638070607`*^9}, 3.635741111486828*^9, 
   3.635757105830962*^9, {3.6368796577134295`*^9, 3.6368796721898766`*^9}, {
   3.6368800534559994`*^9, 3.6368800534970036`*^9}, {3.636881060870731*^9, 
   3.6368810613957834`*^9}, 3.636881200348677*^9, {3.6368820876898456`*^9, 
   3.6368821158068457`*^9}, 3.6368826112817755`*^9, 3.636954022371296*^9, 
   3.6369545307301545`*^9, 3.636962636238643*^9, {3.6369626695909777`*^9, 
   3.636962706072626*^9}, 3.636963132844358*^9, 3.637383593126497*^9, {
   3.640685461211028*^9, 3.640685468884467*^9}, {3.644634214395629*^9, 
   3.6446342775322404`*^9}, {3.644634408337722*^9, 3.644634440975589*^9}, {
   3.644634568358875*^9, 3.6446345693559318`*^9}, {3.6446347801289873`*^9, 
   3.644634803497324*^9}, {3.6446350012066326`*^9, 3.644635007339983*^9}, 
   3.6477458717961707`*^9, {3.6477461838240175`*^9, 3.647746184236041*^9}, {
   3.647750575147187*^9, 3.647750590214049*^9}, 3.6477507450239034`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"systemBoundaryEquations", " ", "=", " ", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"pp", " ", "==", " ", 
      RowBox[{"cp", " ", "+", " ", 
       RowBox[{"Zcp", " ", "qp"}]}]}], ",", "\[IndentingNewLine]", 
     RowBox[{"pc", " ", "==", " ", 
      RowBox[{"cc", " ", "-", " ", 
       RowBox[{"Zcc", " ", "qp"}]}]}]}], "\[IndentingNewLine]", "}"}]}], 
  ";"}]], "Input",
 CellChangeTimes->{{3.636638456547656*^9, 3.636638498917079*^9}, {
  3.6366410953325853`*^9, 3.636641117804871*^9}, {3.6366411512757854`*^9, 
  3.636641157497141*^9}, {3.6369606211401443`*^9, 3.636960628387869*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"expressions", " ", "=", " ", 
   RowBox[{"{", "\[IndentingNewLine]", 
    RowBox[{
     RowBox[{"qc", " ", "==", " ", 
      RowBox[{"-", "qp"}]}], ",", "\[IndentingNewLine]", 
     RowBox[{"Ro", "==", 
      FractionBox[
       RowBox[{"rho", " ", "dh", " ", 
        RowBox[{"Abs", "[", "qp", "]"}]}], 
       RowBox[{"visc", " ", 
        RowBox[{"(", 
         RowBox[{"Ao", "+", 
          RowBox[{
           SuperscriptBox["dh", "2"], " ", 
           SuperscriptBox["eps", "2"]}]}], ")"}]}]]}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"DRL", "\[Equal]", 
      RowBox[{"dh", " ", 
       FractionBox["Ro", 
        RowBox[{"(", 
         RowBox[{"lo", "+", 
          RowBox[{"dh", " ", "eps"}]}], ")"}]]}]}], ",", 
     "\[IndentingNewLine]", 
     RowBox[{"Cd", "==", 
      FractionBox[
       RowBox[{"Abs", "[", "qp", "]"}], 
       RowBox[{"Ao", " ", 
        RowBox[{"Sqrt", "[", 
         RowBox[{
          FractionBox["2", "rho"], 
          RowBox[{"(", 
           RowBox[{
            RowBox[{"Abs", "[", "pdif", "]"}], "+", "eps"}], ")"}]}], 
         "]"}]}]]}]}], "\[IndentingNewLine]", " ", "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.50559120440625*^9, 3.50559120803125*^9}, {
   3.505591469296875*^9, 3.505591475125*^9}, {3.5075486382337513`*^9, 
   3.5075486907344227`*^9}, {3.51582107740806*^9, 3.5158210786736856`*^9}, {
   3.515900481708085*^9, 3.5159004828643227`*^9}, {3.5719027853790617`*^9, 
   3.571902819511922*^9}, 3.579277205856507*^9, {3.5792858268996024`*^9, 
   3.579285829321741*^9}, {3.636636129353548*^9, 3.636636200359609*^9}, {
   3.6366385052874436`*^9, 3.636638546083777*^9}, {3.6366411647565565`*^9, 
   3.6366411680807467`*^9}, {3.636645026602442*^9, 3.6366450432353926`*^9}, {
   3.636652397072008*^9, 3.636652397762048*^9}, {3.637405738454879*^9, 
   3.6374057400540385`*^9}, {3.6443124243534193`*^9, 3.6443124249524794`*^9}, 
   3.6445672922258997`*^9, 3.644567324353738*^9, {3.64457164491786*^9, 
   3.64457164877108*^9}, {3.644571722643306*^9, 3.644571741195367*^9}, {
   3.644571777853463*^9, 3.644571790861207*^9}}],

Cell[BoxData[
 RowBox[{
  RowBox[{"systemVariables", "=", 
   RowBox[{"{", 
    RowBox[{"qp", ",", "pp", ",", "pc"}], "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.636641322629586*^9, 3.636641348978093*^9}, {
   3.6366449122789025`*^9, 3.6366449140160017`*^9}, 3.6366463285989113`*^9}],

Cell[BoxData[
 RowBox[{
  RowBox[{"variableLowLimits", " ", "=", " ", 
   RowBox[{"{", 
    RowBox[{
     RowBox[{"{", 
      RowBox[{"pp", ",", " ", "0"}], "}"}], ",", " ", 
     RowBox[{"{", 
      RowBox[{"pc", ",", " ", "0"}], "}"}]}], "}"}]}], ";"}]], "Input",
 CellChangeTimes->{{3.578503687973201*^9, 3.5785037499217443`*^9}, {
   3.5785038484203777`*^9, 3.5785038577239103`*^9}, 3.578506383342367*^9, {
   3.578506485618217*^9, 3.5785064856202173`*^9}, {3.578509817259776*^9, 
   3.578509821862039*^9}, 3.5792858912132807`*^9, {3.6366362115722504`*^9, 
   3.6366362219728456`*^9}, {3.636641173639065*^9, 3.636641176368221*^9}}],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Compgen", "[", "file", "]"}]], "Input"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "cntsList"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"\[NoBreak]\\!\\(XMLElement[\\(\\(\\\"modelobject\\\", \
\\(\\({\\(\\(\[LeftSkeleton] 1 \[RightSkeleton]\\)\\), \\(\\(\[LeftSkeleton] \
1 \[RightSkeleton]\\)\\)}\\)\\), \\(\\({\\(\\(XMLElement[\\(\\(\\\"icon\\\", \
\\(\\({\\(\\(\\\"isopath\\\" \[Rule] \
\\\"HydraulicOrificeCheckValveG.svg\\\"\\)\\), \\(\\(\\\"iconrotation\\\" \
\[Rule] \\\"ON\\\"\\)\\), \\(\\(\\\"userpath\\\" \[Rule] \
\\\"HydraulicOrificeCheckValveG.svg\\\"\\)\\)}\\)\\), \
\\(\\({}\\)\\)\\)\\)]\\)\\), \\(\\(XMLElement[\\(\\(\\\"portpositions\\\", \
\\(\\({}\\)\\), \\(\\({\\(\\(XMLElement[\\(\\(\\\"portpose\\\", \\(\\({\\(\\(\
\\\"x\\\" \[Rule] \\\"0\\\"\\)\\), \\(\\(\\\"y\\\" \[Rule] \
0.3333333333333333`\\)\\), \\(\\(\\\"a\\\" \[Rule] \\\"0\\\"\\)\\), \
\\(\\(\\\"name\\\" \[Rule] \\\"Pp\\\"\\)\\)}\\)\\), \
\\(\\({}\\)\\)\\)\\)]\\)\\), \\(\\(\[LeftSkeleton] 6 \[RightSkeleton]\\)\\), \
\\(\\(XMLElement[\\(\\(\\\"portpose\\\", \\(\\({\\(\\(\\\"x\\\" \[Rule] \
\\\"0.75\\\"\\)\\), \\(\\(\\\"y\\\" \[Rule] \\\"1\\\"\\)\\), \\(\\(\\\"a\\\" \
\[Rule] \\\"90\\\"\\)\\), \\(\\(\\\"name\\\" \[Rule] \\\"Cd\\\"\\)\\)}\\)\\), \
\\(\\({}\\)\\)\\)\\)]\\)\\)}\\)\\)\\)\\)]\\)\\)}\\)\\)\\)\\)]\\)\[NoBreak] in \
\[NoBreak]\\!\\(XMLElement[\\(\\(\\\"hopsanobjectappearance\\\", \\(\\(\
\[LeftSkeleton] 1 \[RightSkeleton]\\)\\), \
\\(\\(XMLElement[\\(\\(\\\"modelobject\\\", \\(\\({\\(\[LeftSkeleton] 1 \
\[RightSkeleton]\\)}\\)\\), \\(\\({\\(\\(XMLElement[\\(\\(\\\"icon\\\", \
\\(\\({\\(\\(\\\"isopath\\\" \[Rule] \
\\\"HydraulicOrificeCheckValveG.svg\\\"\\)\\), \\(\\(\\\"iconrotation\\\" \
\[Rule] \\\"ON\\\"\\)\\), \\(\\(\\\"userpath\\\" \[Rule] \
\\\"HydraulicOrificeCheckValveG.svg\\\"\\)\\)}\\)\\), \
\\(\\({}\\)\\)\\)\\)]\\)\\), \\(\\(XMLElement[\\(\\(\\\"portpositions\\\", \
\\(\\({}\\)\\), \\(\\({\\(\\(XMLElement[\\(\\(\\\"portpose\\\", \\(\\({\\(\\(\
\\\"x\\\" \[Rule] \\\"0\\\"\\)\\), \\(\\(\\\"y\\\" \[Rule] \
0.3333333333333333`\\)\\), \\(\\(\\\"a\\\" \[Rule] \\\"0\\\"\\)\\), \
\\(\\(\\\"name\\\" \[Rule] \\\"Pp\\\"\\)\\)}\\)\\), \
\\(\\({}\\)\\)\\)\\)]\\)\\), \\(\\(\[LeftSkeleton] 6 \[RightSkeleton]\\)\\), \
\\(\\(XMLElement[\\(\\(\\\"portpose\\\", \\(\\({\\(\[LeftSkeleton] 1 \
\[RightSkeleton]\\)}\\)\\), \
\\(\\({}\\)\\)\\)\\)]\\)\\)}\\)\\)\\)\\)]\\)\\)}\\)\\)\\)\\)]\\)\\)\\)\\)]\\)\
\[NoBreak] is not a list of contents. The third item in an XMLElement must be \
a list of contents, even if it is an empty list. \\!\\(\\*ButtonBox[\\\"\
\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::cntsList\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.647750754334436*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Export", "::", "autofix"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Malformed symbolic XML expression encountered. This may \
result in unexpected XML data. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/Export\\\", ButtonNote -> \\\"Export::autofix\\\"]\
\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.647750754338436*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "attrhs"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"\[NoBreak]\\!\\(0.3333333333333333`\\)\[NoBreak] in \
\[NoBreak]\\!\\(\\\"y\\\" \[Rule] 0.3333333333333333`\\)\[NoBreak] is not a \
valid value for an attribute in an XMLElement. The value of the attribute \
must be a string. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::attrhs\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.6477507543394365`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Export", "::", "autofix"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Malformed symbolic XML expression encountered. This may \
result in unexpected XML data. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/Export\\\", ButtonNote -> \\\"Export::autofix\\\"]\
\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.6477507543414364`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "attrhs"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"\[NoBreak]\\!\\(0.6666666666666666`\\)\[NoBreak] in \
\[NoBreak]\\!\\(\\\"y\\\" \[Rule] 0.6666666666666666`\\)\[NoBreak] is not a \
valid value for an attribute in an XMLElement. The value of the attribute \
must be a string. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::attrhs\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.6477507543424363`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"Export", "::", "autofix"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Malformed symbolic XML expression encountered. This may \
result in unexpected XML data. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/Export\\\", ButtonNote -> \\\"Export::autofix\\\"]\
\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.6477507543444366`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Further output of \[NoBreak]\\!\\(\\*StyleBox[\\(Export :: \
autofix\\), \\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this \
calculation. \\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", \
ButtonStyle->\\\"Link\\\", ButtonFrame->None, \
ButtonData:>\\\"paclet:ref/message/General/stop\\\", ButtonNote -> \
\\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.6477507543464365`*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"XMLElement", "::", "attrhs"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"\[NoBreak]\\!\\(0.25`\\)\[NoBreak] in \
\[NoBreak]\\!\\(\\\"x\\\" \[Rule] 0.25`\\)\[NoBreak] is not a valid value for \
an attribute in an XMLElement. The value of the attribute must be a string. \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/XMLElement\\\", ButtonNote -> \
\\\"XMLElement::attrhs\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.647750754348437*^9}],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"General", "::", "stop"}], "MessageName"], 
  RowBox[{
  ":", " "}], "\<\"Further output of \
\[NoBreak]\\!\\(\\*StyleBox[\\(XMLElement :: attrhs\\), \
\\\"MessageName\\\"]\\)\[NoBreak] will be suppressed during this calculation. \
\\!\\(\\*ButtonBox[\\\"\[RightSkeleton]\\\", ButtonStyle->\\\"Link\\\", \
ButtonFrame->None, ButtonData:>\\\"paclet:ref/message/General/stop\\\", \
ButtonNote -> \\\"General::stop\\\"]\\)\"\>"}]], "Message", "MSG",
 CellChangeTimes->{
  3.6366413088808002`*^9, 3.636641355307455*^9, 3.6366417197673016`*^9, 
   3.6366418490746975`*^9, 3.6366419386948233`*^9, 3.636642015188198*^9, 
   3.636643722221835*^9, 3.636644257699463*^9, 3.6366445948417463`*^9, {
   3.636645141634021*^9, 3.6366451677285137`*^9}, 3.636645350232952*^9, 
   3.636645989989544*^9, 3.6366460341970725`*^9, 3.6366464282076087`*^9, 
   3.6366465463243647`*^9, 3.6366467331170483`*^9, {3.636647553575976*^9, 
   3.636647566722728*^9}, 3.636647724480751*^9, 3.6366524044044275`*^9, 
   3.636686618537298*^9, 3.6366877306958947`*^9, 3.636688107279024*^9, 
   3.636688349719266*^9, 3.6366947993985815`*^9, 3.6366949134195843`*^9, 
   3.6366949592181635`*^9, 3.636960633339364*^9, 3.637405864203452*^9, 
   3.6374059242234535`*^9, {3.6374059653095617`*^9, 3.6374059717062016`*^9}, 
   3.6374657177947063`*^9, 3.6374696290366926`*^9, 3.6374729439865108`*^9, 
   3.6397640534936104`*^9, 3.6398034355739145`*^9, 3.6445668818054256`*^9, 
   3.644567295095064*^9, 3.6445673299300566`*^9, 3.644567859304335*^9, 
   3.6445718105373325`*^9, 3.647750619384717*^9, {3.6477506555817876`*^9, 
   3.647750668891549*^9}, 3.647750716004244*^9, 3.6477507543494368`*^9}]
}, Open  ]]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1050, 690},
WindowMargins->{{Automatic, -171}, {-98, Automatic}},
Magnification->1.2000000476837158`,
FrontEndVersion->"8.0 for Microsoft Windows (64-bit) (October 6, 2011)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[579, 22, 252, 4, 85, "Section"],
Cell[834, 28, 248, 4, 34, "Input"],
Cell[1085, 34, 896, 17, 34, "Input"],
Cell[CellGroupData[{
Cell[2006, 55, 68, 1, 43, "Subsection"],
Cell[2077, 58, 115, 3, 32, "Text"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2229, 66, 100, 1, 43, "Subsection"],
Cell[2332, 69, 1847, 38, 175, "Input"],
Cell[4182, 109, 1094, 22, 95, "Input"],
Cell[5279, 133, 1046, 24, 115, "Input"],
Cell[6328, 159, 2488, 49, 175, "Input"],
Cell[8819, 210, 899, 21, 115, "Input"],
Cell[9721, 233, 165, 4, 34, "Input"],
Cell[9889, 239, 109, 1, 32, "Text"],
Cell[10001, 242, 72, 1, 32, "Text"],
Cell[10076, 245, 187, 4, 34, "Input"],
Cell[10266, 251, 136, 3, 34, "Input"],
Cell[CellGroupData[{
Cell[10427, 258, 547, 10, 75, "Input"],
Cell[10977, 270, 511, 9, 35, "Output"]
}, Open  ]],
Cell[11503, 282, 153, 3, 32, "Text"],
Cell[CellGroupData[{
Cell[11681, 289, 145, 3, 52, "Input"],
Cell[11829, 294, 389, 6, 35, "Output"]
}, Open  ]],
Cell[12233, 303, 739, 12, 34, "Input"],
Cell[12975, 317, 2492, 52, 134, "Input"],
Cell[15470, 371, 2498, 53, 142, "Input"],
Cell[17971, 426, 650, 14, 95, "Input"],
Cell[18624, 442, 2120, 48, 239, "Input"],
Cell[20747, 492, 287, 6, 34, "Input"],
Cell[21037, 500, 635, 13, 34, "Input"],
Cell[CellGroupData[{
Cell[21697, 517, 63, 1, 34, "Input"],
Cell[21763, 520, 3943, 60, 181, "Message"],
Cell[25709, 582, 1617, 26, 26, "Message"],
Cell[27329, 610, 1766, 28, 49, "Message"],
Cell[29098, 640, 1619, 26, 26, "Message"],
Cell[30720, 668, 1766, 28, 49, "Message"],
Cell[32489, 698, 1619, 26, 26, "Message"],
Cell[34111, 726, 1693, 27, 26, "Message"],
Cell[35807, 755, 1734, 27, 26, "Message"],
Cell[37544, 784, 1696, 27, 26, "Message"]
}, Open  ]]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)
